home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 25 / AACD 25.iso / AACD / Programming / yaec / modules / datatypes.e < prev    next >
Encoding:
Text File  |  2001-08-12  |  2.2 KB  |  24 lines
  1. OPT MODULE
  2. OPT EXPORT
  3. -> Module created with E:bin/fd2module from YAECv18 package.
  4. OPT NDDC
  5. -> --- functions in V40 or higher (Release 3.1) ---
  6. -> 
  7. ->  Public entries
  8. -> 
  9. #macro ObtainDataTypeA(type,handle,attrs) IS Stores(datatypesbase,type,handle,attrs) BUT Loads(A6,D0,A0,A1) BUT ASM ' jsr -36(a6)'
  10. #macro ReleaseDataType(dt) IS (A0:=dt) BUT (A6:=datatypesbase) BUT ASM ' jsr -42(a6)'
  11. #macro NewDTObjectA(name,attrs) IS Stores(datatypesbase,name,attrs) BUT Loads(A6,D0,A0) BUT ASM ' jsr -48(a6)'
  12. #macro DisposeDTObject(o) IS (A0:=o) BUT (A6:=datatypesbase) BUT ASM ' jsr -54(a6)'
  13. #macro SetDTAttrsA(o,win,req,attrs) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(datatypesbase,o,win,req,attrs) BUT Loads(A6,A0,A1,A2,A3) BUT ASM ' jsr -60(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  14. #macro GetDTAttrsA(o,attrs) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(datatypesbase,o,attrs) BUT Loads(A6,A0,A2) BUT ASM ' jsr -66(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  15. #macro AddDTObject(win,req,o,pos) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(datatypesbase,win,req,o,pos) BUT Loads(A6,A0,A1,A2,D0) BUT ASM ' jsr -72(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  16. #macro RefreshDTObjectA(o,win,req,attrs) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(datatypesbase,o,win,req,attrs) BUT Loads(A6,A0,A1,A2,A3) BUT ASM ' jsr -78(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  17. #macro DoAsyncLayout(o,gpl) IS Stores(datatypesbase,o,gpl) BUT Loads(A6,A0,A1) BUT ASM ' jsr -84(a6)'
  18. #macro DoDTMethodA(o,win,req,msg) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(datatypesbase,o,win,req,msg) BUT Loads(A6,A0,A1,A2,A3) BUT ASM ' jsr -90(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  19. #macro RemoveDTObject(win,o) IS Stores(datatypesbase,win,o) BUT Loads(A6,A0,A1) BUT ASM ' jsr -96(a6)'
  20. #macro GetDTMethods(object) IS (A0:=object) BUT (A6:=datatypesbase) BUT ASM ' jsr -102(a6)'
  21. #macro GetDTTriggerMethods(object) IS (A0:=object) BUT (A6:=datatypesbase) BUT ASM ' jsr -108(a6)'
  22. #macro PrintDTObjectA(o,w,r,msg) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(datatypesbase,o,w,r,msg) BUT Loads(A6,A0,A1,A2,A3) BUT ASM ' jsr -114(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  23. #macro GetDTString(id) IS (D0:=id) BUT (A6:=datatypesbase) BUT ASM ' jsr -138(a6)'
  24.